/ Whiteline: Alpha / Whiteline Alpha.iso / vision / programm / paintshp / gpl / fadengrf.gpl

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 1b 62 30 1b 63 30 01 12 | d7 44 74 6d 47 50 4c 00 |.b0.c0..|.DtmGPL.|
|00000010| 39 00 1d 27 20 2a 20 2a | 20 2a 20 2a 20 2a 20 2a |9..' * *| * * * *|
|00000020| 20 2a 20 2a 20 2a 20 2a | 20 2a 20 2a 20 2a 20 2a | * * * *| * * * *|
|00000030| 00 1d 27 20 2a 20 20 46 | 20 41 20 44 20 45 20 4e |..' *  F| A D E N|
|00000040| 20 47 20 52 20 41 20 46 | 20 49 20 4b 20 20 2a 00 | G R A F| I K  *.|
|00000050| 1d 27 20 2a 20 2a 20 2a | 20 2a 20 2a 20 2a 20 2a |.' * * *| * * * *|
|00000060| 20 2a 20 2a 20 2a 20 2a | 20 2a 20 2a 20 2a 00 04 | * * * *| * * *..|
|00000070| 77 3d 39 39 00 02 44 4f | 00 05 20 20 43 4c 53 00 |w=99..DO|..  CLS.|
|00000080| 11 20 20 44 45 46 54 45 | 58 54 20 31 2c 31 2c 30 |.  DEFTE|XT 1,1,0|
|00000090| 2c 36 00 20 20 20 54 45 | 58 54 20 33 33 30 2c 33 |,6.   TE|XT 330,3|
|000000a0| 39 30 2c 22 46 61 64 65 | 6e 67 72 61 66 69 6b 20 |90,"Fade|ngrafik |
|000000b0| 4e 72 2e 22 00 07 20 20 | 43 4c 52 20 6a 00 05 20 |Nr."..  |CLR j.. |
|000000c0| 20 6f 3d 77 00 08 20 20 | 52 45 50 45 41 54 fd ec | o=w..  |REPEAT..|
|000000d0| 00 0b 77 3d 52 41 4e 44 | 4f 4d 28 33 29 00 0c 20 |..w=RAND|OM(3).. |
|000000e0| 20 55 4e 54 49 4c 20 77 | 3c 3e 6f 00 0b 20 20 76 | UNTIL w|<>o..  v|
|000000f0| 3d 53 55 43 43 28 77 29 | 00 12 20 20 44 45 46 54 |=SUCC(w)|..  DEFT|
|00000100| 45 58 54 20 31 2c 31 36 | 2c 30 2c 36 00 10 20 20 |EXT 1,16|,0,6..  |
|00000110| 54 45 58 54 20 34 35 32 | 2c 33 39 30 2c 76 00 08 |TEXT 452|,390,v..|
|00000120| 20 20 49 46 20 77 3d 30 | fd ec 00 04 70 3d 39 34 |  IF w=0|....p=94|
|00000130| fd ec 00 03 71 3d 31 fd | ec 00 03 72 3d 32 fd ec |....q=1.|...r=2..|
|00000140| 00 0c 65 3d 4d 55 4c 28 | 32 30 30 2c 70 29 00 07 |..e=MUL(|200,p)..|
|00000150| 20 20 45 4e 44 49 46 00 | 08 20 20 49 46 20 77 3d |  ENDIF.|.  IF w=|
|00000160| 31 fd ec 00 04 70 3d 37 | 37 fd ec 00 03 71 3d 32 |1....p=7|7....q=2|
|00000170| fd ec 00 03 72 3d 33 fd | ec 00 0c 65 3d 4d 55 4c |....r=3.|...e=MUL|
|00000180| 28 31 31 30 2c 70 29 00 | 07 20 20 45 4e 44 49 46 |(110,p).|.  ENDIF|
|00000190| 00 08 20 20 49 46 20 77 | 3d 32 fd ec 00 04 70 3d |..  IF w|=2....p=|
|000001a0| 37 37 fd ec 00 03 71 3d | 32 fd ec 00 03 72 3d 31 |77....q=|2....r=1|
|000001b0| fd ec 00 0c 65 3d 4d 55 | 4c 28 31 31 30 2c 70 29 |....e=MU|L(110,p)|
|000001c0| 00 07 20 20 45 4e 44 49 | 46 00 08 20 20 49 46 20 |..  ENDI|F..  IF |
|000001d0| 77 3d 33 fd ec 00 04 70 | 3d 37 37 fd ec 00 03 71 |w=3....p|=77....q|
|000001e0| 3d 31 fd ec 00 03 72 3d | 32 fd ec 00 0c 65 3d 4d |=1....r=|2....e=M|
|000001f0| 55 4c 28 32 30 30 2c 70 | 29 00 07 20 20 45 4e 44 |UL(200,p|)..  END|
|00000200| 49 46 00 07 20 20 76 3d | 36 33 30 00 07 20 20 77 |IF..  v=|630..  w|
|00000210| 3d 32 30 30 00 08 20 20 | 52 45 50 45 41 54 fd ec |=200..  |REPEAT..|
|00000220| 00 0a 78 3d 4d 55 4c 28 | 71 2c 6a 29 fd ec 00 05 |..x=MUL(|q,j)....|
|00000230| 43 4f 53 20 78 fd ec 00 | 09 4d 55 4c 20 78 2c 33 |COS x...|.MUL x,3|
|00000240| 31 30 fd ec 00 09 41 44 | 44 20 78 2c 33 32 30 fd |10....AD|D x,320.|
|00000250| ec 00 0a 79 3d 4d 55 4c | 28 72 2c 6a 29 fd ec 00 |...y=MUL|(r,j)...|
|00000260| 05 53 49 4e 20 79 fd ec | 00 09 4d 55 4c 20 79 2c |.SIN y..|..MUL y,|
|00000270| 31 39 30 fd ec 00 09 41 | 44 44 20 79 2c 32 30 30 |190....A|DD y,200|
|00000280| fd ec 00 0c 4c 49 4e 45 | 20 76 2c 77 2c 78 2c 79 |....LINE| v,w,x,y|
|00000290| fd ec 00 03 76 3d 78 fd | ec 00 03 77 3d 79 fd ec |....v=x.|...w=y..|
|000002a0| 00 07 41 44 44 20 6a 2c | 70 00 0b 20 20 55 4e 54 |..ADD j,|p..  UNT|
|000002b0| 49 4c 20 6a 3e 65 00 04 | 4c 4f 4f 50 00 00 1a 1b |IL j>e..|LOOP....|
|000002c0| 62 31 0d 0a             |                         |b1..    |        |
+--------+-------------------------+-------------------------+--------+--------+